home *** CD-ROM | disk | FTP | other *** search
/ System Booster / System Booster.iso / Desktop Improver / NewIconsV2 / Install / Install_NewIcons < prev    next >
Encoding:
Text File  |  1996-09-27  |  7.6 KB  |  304 lines
  1. ; NewIcons Installer Script
  2. ; $Ver: 38.3 (8-Jan-95)
  3. ; Written by Philip A. Vedovatti
  4. ; for Program Author Nicola Salmoria,
  5. ; with many thanks for his fine programming work.
  6.  
  7. (set @default-dest "SYS:C")
  8.  
  9. (set #bad-kick
  10.    (cat "\n\nSorry! You must have Workbench 2.0 or"
  11.         "higher to to use this package."))
  12.  
  13. (set #hello-message
  14.    (cat "\n\nThank you for trying NewIcons, the revolutionary"
  15.         "\nGraphical User Interface system for the Amiga."
  16.         "\nPlease read the documentation to get the most out"
  17.         "\nof this package.  Nothing will be deleted from your"
  18.         "\nsystem with this installation program.  Your old WB"
  19.         "\nicons will still be there, even though it won't look"
  20.         "\nlike it on your screen.  If you don't understand any"
  21.         "\npart of the installation, click on the \"Help\" gadget"
  22.         "\nfound throughout the installation for more information."
  23.         "\n\nCLICK TO PROCEED"))
  24.  
  25. (set #install-which
  26.    (cat "\nWhich part(s) of the NewIcons System would"
  27.         "\nyou like to install onto your hard drive?\n"))
  28.  
  29. (set #install-library
  30.    (cat "\n\nInstalling NewIcon.library to LIBS:."
  31.         "\nThis is required for the icon installation."))
  32.  
  33. (set #install-library-help
  34.    (cat "\n\n    This library is required to use NewIcons"
  35.         "\n and is required for the icon installation."))
  36.  
  37. (set #install-icons
  38.    (cat "\n\nInstalling the NewIcons files to your C:"
  39.         "\ndirectory and NewIcon images to your SYS: partition."
  40.         "\n\nYour old icons will NOT be removed."
  41.         "\n\nNOTE: make sure you have the standard Amiga 'list'"
  42.         "\ncommand in your command path before proceeding."))
  43.  
  44. (set #install-icons-help
  45.    (cat "\n\nThe new icon images will be embedded in"
  46.         "\nthe tool types of your existing .info"
  47.         "\nfiles.  The tooltype lines will be"
  48.         "\ninvisible once NewIcons is running"
  49.         "\nso operation will be totally transparent"
  50.         "\nto the user."))
  51.  
  52. (set #install-newicons
  53.    (cat "\n\nCopying the NewIcons main files to C:"
  54.         "\nand newicon.library to Libs:"))
  55.  
  56. (set #install-newicons-help
  57.    (cat "\n\nThis section installs NewIcons, Injectbrush"
  58.         "\nand PatchOpenWB to your C: directory."
  59.         "\nAdditionally, the newicon.library will be"
  60.         "\ncopied to your Libs: drawer."))
  61.  
  62. (set #tools-dest
  63.    (cat "\nWhich drawer would you like the NewIcon"
  64.         "\nmanipulation utilities to be installed?\n"))
  65.  
  66. (set #startup-newicon
  67.    (cat "\n\nAdding a line to your S:User-Startup file"
  68.         "\nto launch NewIcons whenever the system"
  69.         "\nis booted up."))
  70.  
  71. (set #install-deficons
  72.    (cat "\n\nInstalling the DefIcons daemon to your"
  73.         "\nC: directory, and copying default icons"
  74.         "\nto your Envarc:sys directory."))
  75.  
  76. (set #install-deficons-help
  77.    (cat "\nThis sections installs the Deficons program"
  78.         "\nand copies the required def_icons to your"
  79.         "\nENVARC: directory."))
  80.  
  81. (set #move-olddefs-dir
  82.    (cat "The installer will move your old default"
  83.         "\nicons to another location for safe keeping."
  84.         "\nWhere would you like me to create a directory"
  85.         "\nto put them in?"))
  86.  
  87. (set #move-olddefs-help
  88.    (cat "\nThis section copies your old default icons to"
  89.         "\na safe place instead of overwriting them."
  90.         "\nShould you wish to deinstall Deficons, you"
  91.         "\nWill have them available to restore."))
  92.  
  93. (set #move-olddefs
  94.    (cat "Moving your old default icons to \n"
  95.         destdir))
  96.  
  97. (set #install-envarc
  98.    (cat "\nCopying the default icons and brainfile"
  99.         "\nto ENVARC: so DefIcons can use them.\n"))
  100.  
  101. (set #install-envarc-help
  102.    (cat "\n\nThis section install the icons that DefIcons"
  103.         "\nwill use to display icon images for files that"
  104.         "\ndon't have icons already attached to them."))
  105.  
  106. (set #startup-deficons
  107.    (cat "\n\nAdding a line to your S:user-Startup file"
  108.         "\nto launch DefIcons whenever the system"
  109.         "\nis booted up."))
  110.  
  111. (set #powb-message
  112.    (cat "\n\nIf you have installed NewIcons, you must "
  113.            "add a line to your S:Startup-Sequence:\n\n"
  114.            "C:PatchOpenWB\n"
  115.            "\nto fix a bug in the 3.x operating system!"
  116.            "\n\n Make sure to place the line after Setpatch"
  117.            "\nand before IPrefs."))
  118. (set #exit-message
  119.    (cat "Please reboot your system to fully activate\n"
  120.         "the NewIcons and/or Deficons Systems."
  121.         "\n\n\nHave fun using NewIcons!"))
  122.  
  123. (set #docs-dest
  124.    (cat "Where would you like the NewIcons Documentation"
  125.         "\nGuide to be installed?"))
  126.  
  127. ; ------------------------------
  128. ; Check Kickstart Version
  129. ; ------------------------------
  130.  
  131.  (if (< (getversion "LIBS:version.library") (* 37 65536))
  132.         (abort #bad-kick)
  133.  )
  134.  
  135. (message #hello-message)
  136.  
  137. ; ------------------------------
  138. ; What should I install?
  139. ; ------------------------------
  140.  
  141. (set InstallOpt
  142.       (askoptions (prompt #install-which)
  143.                   (help @askoptions-help)
  144.                   (choices "NewIcons" "DefIcons" "Documentation")
  145.       )
  146. )
  147.  
  148. ; ------------------------------
  149. ; Install NewIcon.library
  150. ; ------------------------------
  151.  
  152. (copylib
  153.       (source "/libs/newicon.library")
  154.       (dest "libs:")
  155.       (prompt #install-library)
  156.       (help #install-library-help)
  157.       (confirm)
  158. )
  159.  
  160. ;-------------------------------------------------------
  161. ;Install icon images, NewIcons, and icon support files
  162. ;-------------------------------------------------------
  163.  
  164.  
  165. (if (BITAND InstallOpt 1)
  166.  
  167.   ((message #install-icons)
  168.  
  169.    (execute "Install_Icons"
  170.       (help #install-icons-help)
  171.    )
  172.  
  173.    (copylib
  174.       (prompt #install-newicons)
  175.       (source "/C/NewIcons")
  176.       (dest "c:")
  177.       (help #install-newicons-help)
  178.    )
  179.  
  180.    (copylib
  181.       (source "/C/InjectBrush")
  182.       (dest "c:")
  183.    )
  184.  
  185.    (copylib
  186.       (source "/C/PatchOpenWB")
  187.       (dest "c:")
  188.    )
  189.  
  190.  
  191.    (set destdir
  192.       (askdir
  193.             (prompt #tools-dest)
  194.             (help @askdir-help)
  195.             (default "Sys:Utilities")
  196.       )
  197.    )
  198.  
  199.    (copyfiles
  200.       (source "/Utilities/CopyNewIcon")
  201.       (dest destdir)
  202.       (infos)
  203.    )
  204.  
  205.    (copyfiles
  206.       (source "/Utilities/CreateDefaultIcon")
  207.       (dest destdir)
  208.       (infos)
  209.    )
  210.  
  211.    (copyfiles
  212.       (source "/Utilities/KillNewIcon")
  213.       (dest destdir)
  214.       (infos)
  215.    )
  216.  
  217.    (startup "NewIcons"
  218.       (prompt #startup-newicon)
  219.       (command "NewIcons")
  220.       (help @startup-help)
  221.    )
  222.   )
  223. )
  224.  
  225. ;------------------------------
  226. ;Install Deficons
  227. ;------------------------------
  228.  
  229. (if (BITAND InstallOpt 2)
  230.  
  231.  
  232.   ((set destdir
  233.       (askdir
  234.            (prompt #move-olddefs-dir)
  235.            (help #move-olddefs-help)
  236.            (default "Sys:Storage")
  237.       )
  238.    )
  239.  
  240.    (set destdir
  241.       (tackon destdir "Old_Def_icons")
  242.    )
  243.  
  244.    (makedir destdir
  245.    )
  246.  
  247.    (copyfiles
  248.       (prompt #move-olddefs)
  249.       (source "Envarc:sys")
  250.       (dest destdir)
  251.       (pattern "def#?")
  252.       (help #move-olddefs-help)
  253.    )
  254.  
  255.    (copylib
  256.       (prompt #install-deficons)
  257.       (source "/C/DefIcons")
  258.       (dest "C:")
  259.       (help #install-deficons-help)
  260.       (confirm)
  261.    )
  262.  
  263.    (copyfiles
  264.       (prompt #install-envarc)
  265.       (source "/envarc")
  266.       (dest "ENVARC:")
  267.       (all)
  268.       (infos)
  269.       (help #install-envarc-help)
  270.    )
  271.  
  272.    (startup "DefIcons"
  273.       (prompt #startup-deficons)
  274.       (command "DefIcons")
  275.       (help @startup-help)
  276.    )
  277.   )
  278. )
  279.  
  280.  
  281. ;------------------------------
  282. ;Install Documentation
  283. ;------------------------------
  284.  
  285. (if (BITAND InstallOpt 4)
  286.  
  287.    ((set destdir
  288.       (askdir
  289.             (prompt #docs-dest)
  290.             (help @askdir-help)
  291.             (default "Help:")
  292.       )
  293.     )
  294.     (copyfiles
  295.       (source "/NewIcons.guide")
  296.       (dest destdir)
  297.       (infos)
  298.     )
  299.    )
  300. )
  301.  
  302. (message #powb-message)
  303.  
  304. (exit #exit-message)